home *** CD-ROM | disk | FTP | other *** search
- #include <arpbase.h>
- #include <arp_proto.h>
- #include "Launch.h"
- #include "LaunchPriv.h"
-
-
- /*
- * NAME
- * CheckAlive -- check if the process is still alive.
- *
- * SYNOPSIS
- * alive = CheckAlive (Proc)
- *
- * BOOL CheckAlive (struct Process *);
- *
- * DESCRIPTION
- * Scan the list of process pair for a pair whose child is the
- * process passed as input. It then check if the entry point is
- * NULL, meaning the child is dead.
- *
- * INPUT
- * Proc - the process who wants to find if it's alive.
- *
- * OUTPUT
- * alive - non-null if the process is alive.
- *
- * NOTE
- * This function can be used as a polling mecanism to find out
- * if the child still exists.
- *
- * HISTORY
- * 1992/09/06 Pierre Baillargeon Creation
- *
- */
-
- BOOL CheckAlive (struct Process *Proc)
- {
- struct ProcPair *pp;
- BOOL result;
-
- Forbid ();
- if (NULL != ProcPairList && NULL != (pp = IsChild (Proc)))
- {
- result = (pp->pp_ChildEntry != NULL);
- }
- else
- {
- result = 0;
- }
- Permit ();
-
- return result;
- }
-